home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
util
/
cli
/
mykinf.lha
/
inf25
/
Install Inf
< prev
next >
Wrap
Text File
|
1995-04-06
|
3KB
|
98 lines
; An installer test
(set ProductName "Inf")
(set VersionNum "2.5")
(set OSVersion (/ (getversion) 65536))
(welcome "Welcome to the Inf Installer!!!!\n" )
(if (< OSVersion 37)
(
(abort "You must be using Kickstart 2.04 to use " ProductName)
))
(complete 0)
(set @default-dest
(askdir
(prompt "Where do you want to install the " ProductName " executable?")
(help @askdir-help)
(default "c:")
)
)
(working "Working...")
(copyfiles
(prompt "Copying " ProductName "...")
(source "" )
(dest @default-dest)
(pattern "(Inf)")
(help @copyfiles-help)
)
(complete 50)
(if
(askbool
(prompt "Do you want to copy the manual/docs and related files?")
(help "This program includes some documents/help files. If you want "
"to install them select YES, you will then be asked to choose "
"the destination directory, then wether you want the icons to "
"be copied, then you can select "
"which files you want to copy. If you select NO the files will "
"not be copied.")
(default 1)
)
(
(set DESTINATION
(askdir
(prompt "Where do you want the manual and related files?")
(help @askdir-help)
(default "man:")
)
)
(if
(askbool
(prompt "Do you want to copy the icons as well?")
(help "Some of the files have icons. Select No if you do not "
"want to copy them.")
(default 1)
)
(copyfiles
(prompt "Copying...")
(source "" )
(dest DESTINATION)
(choices "Inf.guide" "Inf.e" "InfWin.ilbm")
(infos)
(confirm average)
(help "You can choose which files you want to install by "
"setting the check boxes.\n\n"
"The files are as follows:\n"
"Inf.guide - The main Amiga Guide Document\n"
"Inf.e - The Source Code\n"
"InfWin.ilbm - An Example picture\n\n"
"If you do not copy all the files some of the links "
"in the Amiga Guide document will not work, however "
"the guide will remain usable.")
)
; Else Don't copy Icons..
(copyfiles
(prompt "Copying...")
(source "" )
(dest DESTINATION)
(choices "Inf.guide" "Inf.e" "InfWin.ilbm")
(confirm average)
(help @copyfiles-help)
)
) ; End of If Copy Icons
)
)
(complete 100)
(exit "Bye Bye, I Hope you find " ProductName " " VersionNum " useful")